:loop
ECHO OFF
CLS
IF NOT EXIST %1.FOR GOTO FORSTOP
IF EXIST %1.FOR C:\EDLIN %1.FOR
:BBBBB
h1
FOR1 %1.FOR;
PAS2 
LINK %1;
h2
%1
PAUSE
h3
GOTO LOOP
:FORSTOP
h4
C:\EDLIN %1.FOR
IF EXIST %1.FOR GOTO BBBBB
